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METHOD, COMPUTER PROGRAM PRODUCT, AND SYSTEM 
FOR CREATING FORM INDEPENDENT APPLICATIONS OPERATIVE ON 

IMS RESOURCES 

FIELD OF INVENTION 

The present invention relates to computer application programs. More 
specifically, the present invention relates to application programs, tools and utility 
programs that operate in an Information Management System (IMS) environment. (IMS 
is a trademark of Internationa] Business Machines Corporation in the United States, other 
countries, or both.) The present invention provides for performing application 
programming tasks without predetermined knowledge pertaining to the language 
affiliated with relevant Program Specification Blocks (PSBs) or predetermined 
knowledge pertaining to the quantity, type, order or other characteristics of relevant 
Program Control Blocks (PCBs). 

BACKGROUND 

IMS is a hierarchical database management system (HDBMS) developed by 
International Business Machines Corporation. IMS has wide spread usage in many large 
enterprises where high transaction volume, reliability, availability and scaleability are of 
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the utmost importance. While IMS provides the software and interfaces for running the 
businesses of many of the world's large corporations, a company typically makes a 
significant investment in IMS application programs in order to have IMS perform useful 
work for the enterprise. IMS application programs are typically coded in COBOL, PL/I, 
5 C, PASCAL or assembly language. These application programs perform IMS database 
functions by making Data Language One (DL/I) calls to invoke the needed IMS 
processing. 

Sometimes an application program is custom developed by a company for its 
exclusive use on a particular IMS system. However, there is a different class of 
^10 application programs known in the art as tools, utilities, or utility programs (henceforth 
ut referred to as utility programs). These utility programs are frequently developed by a 

s: software provider to perform tasks that are very common for many IMS installations, 

^ thereby saving a significant amount of work otherwise expended in developing custom 

■1J applications to perform very common tasks. For example, unloading and reloading IMS 

1 5 databases for the purposes of backup/recovery or performance tuning are very common 
tasks for which numerous utility programs have been developed. 

The use of these utility programs may save significant time when compared to the 
laborious process of developing comparable custom application programs. However, the 
ease with which these utility programs are deployed can be greatly improved. Problems 
20 may occur because the developer of a utility program typically has little or no knowledge 
of the form of specific IMS data structures or constructs (henceforth referred to as 
STL920000102US1 2 



Express Label #: EL290558949US 

constructs) associated with IMS resources that exist for a particular IMS installation in 
which the utility program is intended to execute. Indeed, a software provider typically 
intends that a utility program be deployed across numerous IMS systems over various 
times resulting in significant unpredictability about the nature of the IMS constructs that 
5 may exist during the utility program's execution on a particular system at a given time. 
While the above problems may occur with any IMS application program, they are more 
likely to occur in conjunction with utility programs where the potential for a wider scope 
of deployment results in an increased diversity of encountered IMS construct forms. 

These compatibility issues may force a user of a prior art utility program to create 
-2\ 0 or modify the needed IMS constructs to conform with the requirements of the utility 
ij program. Adhering to these requirements prior to using the utility program may present 

problems to the user. First, making custom adjustments to the IMS constructs to adhere 
ij to the utility program requirements typically involves contacting an IMS database 

administrator with the specialized knowledge and authorization necessary to make these 
1 5 changes. The IMS database administrator may not be immediately available to perform 
such tasks, potentially resulting in even further delays beyond that which the actual work 
requires. Second, this process is error prone because of the great precision required when 
making changes to IMS constructs and the additional communication required between 
the utility program user and the database administrator. Further, the exacting 
20 requirements of a utility program are not always clearly documented, nor are they always 
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noticed, potentially resulting in the discovery of these requirements only after 
encountering disruptive error conditions when trying to execute the utility program. 

Typically, using an IMS utility program for the first time involves completing a 
PSB generation process (PSBGEN) to create PSB and PCB constructs for required IMS 
5 resources that are compatible in form with the utility program requirements. Form 
compatibility considerations include a specification of language, such as assembly 
language or COBOL, the coding of various compatibility specifications, as well as the 
order, quantity and types of PCB constructs to be included for the PSB. Performing these 
tasks is particularly annoying to a user if all of this effort must be taken even though the 

10 needed PSB and PCB constructs already exist (but are simply in the wrong form with 
respect to the utility program requirements.) 

These problems have been recognized in the past and several attempts have been 
made to resolve them. For example, a Language Environment ( LE) DL/I call was 
developed to address language compatibility problems. This interface, known in the art 

15 as CEETDLI, allows the IMS application program to achieve language independence. 
However, the interface only partially resolves all of the above identified problems and 
additionally introduces another weakness. Namely, this solution is only practical if the 
developer's IMS system and all target IMS systems on which the application program 
may eventually execute are enabled for LE processing. It is frequently impractical for a 

20 software provider to know this information in advance. 
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Another DL/I call has been developed, known in the art as ADBTDLI, as an 
attempt to address these problems. This interface allows the programmer to pass the 
name of the required PCB rather than having to predetermine the PCB order such that the 
correct PCB address could be determined from the list of passed PCB addresses. This 

5 interface falls far short of a complete solution to the above identified problems. First, this 
interface does not address language incompatibilities. Second, as with CEETDLI, a new 
similar problem is introduced in that to use this facility special requirements must be 
adhered to when performing the PSBGEN, such as specifying a "PCBNAME= ' 
parameter. Thus, even if the languages were compatible, the absence of the 

10 "PCBNAME-" parameter requires that a new PSBGEN be performed in order to comply 

with the requirements of the AEBTDLI interface. 

Other DL/I calls are known in the art; however, all of these calls are language 
dependent and also require that specific PCB addresses are passed in a specified 
predetermined order. These calls are known as ASMTDLI, PASTDLI, PLITDLI, 

1 5 CBLTDLI, and CTDLI for use with programming languages Assembly Language, 
PASCAL, PL/I, COBOL and C, respectively. 

SUMMARY OF THE INVENTION 



20 



The present invention provides a method, computer program product, and system 
for performing form independent application program operations on one or more IMS 
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resources. The PCB associated with an IMS resource is located exclusive of 
predetermined knowledge pertaining to IMS construct form. The PCB is then utilized to 
perform form independent application program operations on the IMS resource. 

The present invention thereby eliminates constraints placed on the form of IMS 
constructs by an application program executing in an IMS environment. Existing IMS 
constructs are utilized without predetermined knowledge of their number, type, language, 
order or other characteristics. The present invention enables an application program to 
use information from PSBs and PCBs in their existing form, rather than requiring these 
IMS constructs to conform with the idiosyncrasies of an application program's 
implementation. 

The method, computer program product, and system practiced in accordance with 
the present invention have the following advantages. First, significant time savings are 
achieved in providing the flexibility to use existing IMS constructs without forcing the 
user of the application program to perform, or direct a database administrator to perform, 
a PSBGEN operation. Further, the application program is easier to use with simplified 
operating instructions. Further still, the deployment of the application program is less 
prone to error where incompatibilities between the application program and related IMS 
constructs are not properly resolved. 
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BRIEF DESCRIPTION OF THE DRAWINGS 

The preferred embodiments of the present invention will hereinafter be described 
in conjunction with the appended drawings, where like reference numbers denote the 
5 same element throughout the set of drawings. 

Figure 1 is a block diagram of a typical computer system wherein the present 
invention may be practiced. 

Figure 2 is a block diagram of an exemplary IMS subsytem including an IMS 
application program in accordance with the present invention. 
10 Figure 3 is a data structure utilized by the present invention. 

Figure 4 is a data structure utilized by the present invention in a PL/I environment. 

Figure 5 is a data structure utilized by the present invention in a PASCAL 
environment. 

Figure 6 is a data structure utilized by the present invention in a COBOL, 
1 5 Assembler or C environment. 

Figure 7 represents the data structure for a database PCB. 
Figure 8 represents the data structure for an I/O PCB. 

Figure 9 is a flow diagram in accordance with one aspect of the present invention 
Figure 10 is a flow diagram in accordance with another aspect of the present 
20 invention. 
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Figure 1 1 is a flow diagram illustrating an additional aspect of the present 
invention. 

DESCRIPTION OF THE PREFERRED EMBODIMENTS 

The preferred embodiment in accordance with the present invention is directed to 
a system, computer program product, and method for eliminating constraints typically 
placed on the form of IMS constructs by an application program executing in an IMS 
environment. The following description is presented to enable one of ordinary skill in the 
art to make and use the present invention and is provided in the context of a patent 
application and its requirements. Various modifications to the preferred embodiment will 
be readily apparent to those skilled in the art and the teaching contained herein may be 
applied to other embodiments. Thus, the present invention should not be limited to the 
embodiments shown but is to be accorded the widest scope consistent with the principles 
and features described herein. 

Figure 1 is a block diagram of a computer system 100, such as the S/390 
mainframe computer system. (S/390 is a registered trademark of International Business 
Machines Corporation in the United States, other countries, or both.) The computer 
system 100 comprises one or more central processing units (CPUs) 102, 103, and 104. 
The CPUs 102-104 suitably operate together in concert with memory 1 10 in order to 
execute a variety of tasks. In accordance with techniques known in the art, other 
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components may be utilized with computer system 100, such as input/output devices 
comprising direct access storage devices (DASDs), printers, tapes, etc. (not shown). 
Although the preferred embodiment is described in a particular hardware environment, 
those skilled in the art will recognize and appreciate that this is meant to be illustrative 

5 and not restrictive of the present invention. Accordingly, other alternative hardware 
environments may be used without departing from the scope of the present invention. 

Referring now to Figure 2, a block diagram is shown illustrating an exemplary 
operating system 200, such as the MVS/ESA operating system, suitable for managing the 
resources of computer system 100 and providing the framework for running other 

10 computing subsystems and application programs. (MVS/ESA is a trademark of 

International Business Machines Corporation in the United States, other countries, or 
both.) Subsystems functionally capable of being provided under the MVS/ESA operating 
system include the IMS subsystem 220. The IMS subsystem 220 comprises an IMS 
control region 202, which manages the region resources comprising Message Processing 

1 5 Program (MPP) region 203, Batch Message Processing (BMP) region 204, and 

Interactive Fast Path (IFP) region 205. Other resources that communicate with, or are 
managed by, IMS control region 202 comprise terminals 232 , databases 234, logs 236, 
queues 238 and job control language (JCL) 230. Databases 234 comprise several 
different types of IMS databases, such as DEDB, HDAM and HID AM. 

20 Regions 203-205 are eligible for running application programs in accordance with 

the preferred embodiment. BMP region 204 comprises exemplary IMS application 
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program 210 invoked as a BMP batch application program via JCL 230. Those skilled in 
the art will recognize that Figure 2 is exemplary in nature and that many other IMS 
subsystem configurations are possible within the scope of the present invention. For 
example, in an alternative configuration, application program 210 could execute in MPP 
region 203. Further, IFP region 205 need not exist and other regions, such as an IMS DLI 
or DBB region, could exist. 

Generally, application program 210 is tangibly embodied in and/or readable from 
a computer-readable medium containing the program code (or alternatively, computer 
instructions), which when read and executed by computer system 100 causes computer 
system 100 to perform the steps necessary to implement and/or use the present invention. 
Thus, the present invention may be implemented as a method, an apparatus, or an article 
of manufacture using standard programming and/or engineering techniques to produce 
software, firmware, hardware, or any combination thereof. The term "article of 
manufacture" (or alternatively, "computer program product") as used herein is intended to 
encompass a computer program accessible from any computer-readable device, carrier, or 
media. Examples of a computer readable device, carrier or media include, but are not 
limited to, palpable physical media such as a CD Rom, diskette, hard drive and the like, 
as well as other non-palpable physical media such as a carrier signal, whether over wires 
or wireless, when the program is distributed electronically. 

Referring now to Figure 3, a data structure is shown that is available to an IMS 
application program upon its invocation that is utilized by the preferred embodiment. 
STL920000102US1 10 
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Computer register 13 (reference numeral 300) contains the computer memory address 
(henceforth referred to as "address" or "pointer") of the program save Area 310. The 
High Save Area (HSA) pointer 312 within the program save area 310 contains the address 
of the calling program's save area 320. The calling program's saved computer register 1 

5 (reference numeral 322) within the calling program's save area 320 contains the address 
of the passed parameter list 330. Parameter list 330 contains a contiguous list of 
parameter list entries 332-336 which are in the form of full word (4 byte) addresses. Each 
non-zero address 332-336 points to a candidate PCB. A candidate PCB can either be an 
actual PCB or a pointer to an actual PCB, as explained in greater detail below. The last 

10 parameter 336 in parameter list 330 is designated by a 1 in the high order bit position 338 
of parmlist entry 336. 

Referring now to Figures 4 , 5 and 6, there is shown three possible data structures, 
only one of which will exist during a particular execution of the application program 2 1 0. 
Determining which of these figures will apply depends from the programming language 

1 5 specified during the PSBGEN process associated with the required IMS resources. 

If PL/I was specified during the PSBGEN process then Figure 4 will apply. In this 
environment parameter list entry 332 points to a candidate PCB 432. Through an 
evaluation process explained in greater detail below, the candidate PCB 432 fails to 
qualify as an actual PCB. In this case, the candidate PCB 432 comprises a pointer to an 

20 actual PCB 442. In like manner, the parameter list entries 334 and 336 also point to the 
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candidate PCBs 434 and 436, respectively; which in turn also fail to qualify as actual 
PCBs and accordingly point to the actual PCBs 444 and 446, respectively. 

If PASCAL was specified during the PSBGEN process, then Figure 5 will apply. 
In this environment the first parameter list entry 332 has been set to a value of zero, and 
accordingly the preferred embodiment skips the first parameter list entry 332 of the 
parameter list 330 and begins processing with the second parameter list entry 334. 
Parameter list entry 334 points to the candidate PCB 442 . Through an evaluation 
process, explained in greater detail below, the candidate PCB 442 qualifies as an actual 
PCB 442. In like manner, the parameter list entries 335 and 336 also point to the 
candidate PCBs 444 and 446, respectively which are also qualified to be the actual PCBs 
444 and 446, respectively. 

If neither PL/I nor PASCAL was specified during the PSBGEN process, then 
Figure 6 will apply. In this environment the first parameter list entry 332 points to the 
candidate PCB 442 . Through an evaluation process explained in greater detail below, 
the candidate PCB 442 qualifies as an actual PCB 442. In like manner, the parameter list 
entries 334 and 336 also point to the candidate PCBs 444 and 446, respectively which are 
also qualified to be the actual PCBs 444 and 446, respectively. 

Figure 7 and Figure 8 depict the data area layout for a database PCB and an I/O 
PCB, respectively. The preferred embodiment will test fields within data areas 500 and 
550 in performing the novel methods explained below. Those skilled in the art will 
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recognize that referencing PCB data area fields by name, such as USER 554, precisely 
identifies the corresponding data field by data area offset and field length. 

Referring now to Figure 9, in conjunction with the data structures shown in 
Figures 2, 3, 4, 5, 6, 7, and 8, a flow diagram 650 illustrates one aspect of the preferred 

5 embodiment whereby a dynamic determination during the execution of application 

program 2 1 0 is made as to whether or not a PSB was generated with PL/I (Figure 4), 
PASCAL (Figure 5), or another programming language (Figure 6). As previously 
explained, this dynamic determination capability facilitates construct form independence 
by providing for the use of a preexisting PSB representing needed IMS resources without 

1 0 regard to considerations for the language used during the corresponding PSB generation. 
Step 600, by traversing data structure 350 of Figure 3, gains access to the 
parameter list 330 and tests the first parameter list entry 332 for a value of zero. If the 
parameter list entry 332 is zero then, in step 601 it is determined that the language 
environment is PASCAL. In step 602 it is further concluded that Figure 5 applies for this 

15 execution of application program 210 wherein the parameter list entries 334-336 point to 
the candidate PCBs 442-446, respectively, which are qualified as the actual PCBs 
442-446, respectively. Otherwise, returning now to step 600, if the parameter list entry 
332 is non-zero then processing continues with step 603. 

Step 603 gains access to the first candidate PCB utilizing the parameter list 330 

20 and the first parameter list entry 332. The name field 502 of the first candidate PCB 432 
(Figure 4) or 442 (Figure 6) is evaluated in step 604. In step 608, if the name field 502 
STL920000102US1 13 
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consists of only printable characters (comprising alphanumeric or special characters such 
as "&" or "%") then in step 612 it is determined that the PSB 450 was generated with a 
language other than PL/I and PASCAL. In step 614 it is further concluded that Figure 6 
applies for this execution of the application program 210 wherein the parameter list 
entries 332-336 point to the candidate PCBs 442-446, respectively, which are qualified as 
the actual PCBs 442-446, respectively. Otherwise, returning now to step 608, if the name 
field 502 is not comprised of only printable characters then processing continues with 
step 616. 

In step 61 6 the first word of the candidate PCB 432 is used as a pointer to access 
the first actual PCB 442. The first actual PCB 442 name field 502 is evaluated in step 
618. In step 620, if the name field 502 of the first actual PCB 442 consists of only 
printable characters then in step 628 it is determined that the language used to generate 
PSB 450 was PL/L In step 630, it is further concluded that Figure 4 applies wherein the 
parameter list entries 332-336 point to the candidate PCBs 432-436, respectively, which 
in turn point to the actual PCBs 442-446, respectively for this execution of the application 
program 210. Otherwise, returning now to step 620, if the name field 502 does not 
consist of only printable characters then an actual PCB 442 could not be found, and 
accordingly an error condition is generated in step 624 to reflect this erroneous 
computational state. 

Referring now to Figure 10, in conjunction with data structures shown in Figures 
2, 3, 4, 5, 6, 7, and 8, a flow diagram 750 illustrates another aspect of the preferred 
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embodiment whereby a dynamic determination during application program execution is 
made as to whether or not an I/O PCB 550 exists. Making this PCB type determination 
dynamically within application program 210 is highly beneficial in that it allows 
application program 210 to perform optional processing if the I/O PCB 550 is present, 

5 and to bypass this optional processing if the I/O PCB 550 is not present. For example, 
checkpoint processing can only be requested from IMS subsystem 220 if an I/O PCB is 
present. Likewise, reading or writing messages to the IMS queues 238 can only be 
requested from IMS subsystem 220 if the I/O PCB exists. Prior art solutions would either 
always bypass these optional functions in order to relax requirements on the application 

10 program user, or force the user to produce an I/O PCB 550 which frequently would 
involve a cumbersome PSBGEN operation. In the former case, the benefits of certain 
optional processing, such as checkpoint, are lost. In the latter case, the application 
program user is encumbered with meeting additional requirements prior to application 
program execution. 

1 5 The address of actual PCB 442 is known to the application program 2 1 0 from the 

flow diagram 650 shown in Figure 9 and so utilized in step 700 to access the first actual 
PCB 442. Step 704 evaluates the USER field 554 to confirm that only printable 
characters are contained therein. If this is not the case, then it is determined in step 708 
that the first actual PCB 442 is not an I/O PCB and accordingly the VO PCB 550 does not 

20 exist for this execution of the application program 210. It is not necessary to look at other 
PCBs 444-446 because within the IMS subsystem 220 the VO PCB 550, if it exists, is 
STL920000102US1 15 
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always the first actual PCB 442. Returning now to step 704, if it is the case that USER 
field 554 contains only printable characters, then, in step 712, it is determined that the 
first actual PCB 442 is an I/O PCB 550. Accordingly, since an I/O PCB exists, IMS 
checkpoint and message queue processing may be invoked by the application program 
5 210. 

Proceeding now with the flow diagram 850 of Figure 1 1 , in conjunction with the 
data structures shown in Figures 2, 3, 4, 5, 6, 7, and 8, another method of the preferred 
embodiment is shown for dynamically locating the actual PCB associated with database 
name 245. The application program 210 must have the name or names 245 of the 

10 particular databases 234 on which the various operations comprising application program 
210 will be performed prior to calling the IMS subsystem 220. Those skilled in art will 
recognize that this name information can be obtained by the application program 210 in a 
variety of ways. First, the application program may have been written to execute with 
only predetermined ones of databases 234 and therefore the constant names can be coded 

1 5 into the application program 2 1 0. Typically, however, the database name or names are 
passed to the application program 210 as a parameter or control statement. For example, 
the name or names can be passed via JCL 230 utilizing a '7/SYSIN DD" statement 240 
wherein the database name ""SALES2000" 245 is specified by the user of the application 
program 210. In this manner, more flexibility is achieved and application program 210 

20 can operate on any of a variety of databases. 
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Step 800 of Figure 1 1 begins by accessing the first actual PCB 442, as previously 
explained in the flow diagram 650 of Figure 9. If, in step 804, the NAME field 502 
matches the database name (for example, database name SALES2000 245) then it is 
determined in step 808 that the address of this actual PCB can be used in IMS DL/I calls 

5 to represent the particular database to be operated upon by application program 2 1 0. 
Otherwise, in step 812, a test is made to determine if additional PCBs 444-446 are 
available to check for a name match. This test is made by interrogating the high order bit 
338 of the current parmlist 330 entry. If this bit is set to one, then the current PCB is the 
last PCB 446 and an error is generated in step 820 to reflect that a PCB matching the 

1 0 required database name (for example S ALES2000 245) could not be found. Otherwise, 
additional PCBs are present and processing continues with step 816 where the next actual 
PCB is accessed. This step is accomplished utilizing the next sequential parameter list 
entry from parameter list 330 and either Figure 4, 5, or 6 as previously determined to be 
appropriate in the processing method shown in the flow diagram 650 of Figure 9. Control 

1 5 then passes back to step 804 where once again the name check occurs as explained above. 

The method of the preferred embodiment in accordance with the flow diagram 
850 of Figure 1 1 further facilitates construct form independence for an IMS application 
program. The conventional process of passing PCB addresses, whereby an application 
program must require PCBs to conform to certain quantity and order characteristics, is 

20 completely eliminated. Likewise, the cumbersome process of performing PSBGEN 
operations to create PCBs in the exact quantity and order required by application 
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program is eliminated. Application programs created in accordance with the present 
invention make dynamic determinations to discover the appropriate PCBs to utilize, 
independent from PCB quantity and order characteristics. 

Taken in combination, the flow diagrams 650, 750, and 850 shown in Figures 9, 

5 10 and 1 1 , respectively, provide for the creation of form independent IMS application 

programs wherein the requirements for application program execution are independent 
from the form of related IMS constructs. While the preferred embodiment of the present 
invention has been described in detail, it will be understood that modification and 
adaptations to the embodiment(s) shown may occur to one of ordinary skill in the art 

10 without departing from the scope of the present invention as set forth in the following 
claims. Thus, the scope of this invention is to be construed according to the appended 
claims and not just to the specific details disclosed in the exemplary embodiments. 

References in the claims to an element in the singular is not intended to mean 
"one and only" unless explicitly so stated, but rather "one or more." All structural and 

1 5 function equivalents to the elements of the above-described exemplary embodiment that 
are currently known or later come to be known to those of ordinary skill in the art are 
intended to be encompassed by the present claims. No claim element herein is to be 
construed under the provisions of 35 U.S.C. § 1 1 2, sixth paragraph, unless the element is 
expressly recited using the phrase "means for" or "step for." 

20 



STL920000102US1 



18 



